home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / newsgroups / misc.19970929-19971216 / 000155_news@newsmaster….columbia.edu _Tue Oct 21 08:13:35 1997.msg < prev    next >
Internet Message Format  |  2020-01-01  |  5KB
  1. Return-Path: <news@newsmaster.cc.columbia.edu>
  2. Received: from newsmaster.cc.columbia.edu (newsmaster.cc.columbia.edu [128.59.35.30])
  3.     by watsun.cc.columbia.edu (8.8.5/8.8.5) with ESMTP id IAA05149
  4.     for <kermit.misc@watsun.cc.columbia.edu>; Tue, 21 Oct 1997 08:13:35 -0400 (EDT)
  5. Received: (from news@localhost)
  6.     by newsmaster.cc.columbia.edu (8.8.5/8.8.5) id IAA10167
  7.     for kermit.misc@watsun; Tue, 21 Oct 1997 08:13:34 -0400 (EDT)
  8. Path: news.columbia.edu!news.new-york.net!news-peer.gsl.net!news.gsl.net!gip.net!news-peer.sprintlink.net!news-sea-19.sprintlink.net!news-in-west.sprintlink.net!news.sprintlink.net!Sprint!204.122.16.44!news.eskimo.com!jimo
  9. From: jimo@eskimo.com (Jim Osborn)
  10. Newsgroups: comp.protocols.kermit.misc
  11. Subject: Re: login script beeps unexpectedly
  12. Date: 21 Oct 1997 04:04:59 GMT
  13. Organization: Eskimo North (206) For-Ever
  14. Lines: 96
  15. Message-ID: <62h9lb$pbm$1@eskinews.eskimo.com>
  16. References: <62ejvl$fpk$1@eskinews.eskimo.com> <62ft4g$j94$1@apakabar.cc.columbia.edu>
  17. NNTP-Posting-Host: eskimo.com
  18. Xref: news.columbia.edu comp.protocols.kermit.misc:7933
  19.  
  20. In article <62ft4g$j94$1@apakabar.cc.columbia.edu>,
  21. Frank da Cruz <fdc@watsun.cc.columbia.edu> wrote:
  22. >In article <62ejvl$fpk$1@eskinews.eskimo.com>,
  23. >Jim Osborn <jimo@eskimo.com> wrote:
  24. >: I use the following macro to connect with my ISP...
  25. >:
  26. >And which Kermit program are you using?
  27.  
  28. Oops, sorry - C-Kermit 6.0, purchased on the CD about three weeks ago,
  29. running on a Linux console, kernel 1.1.59.  Thought my mention of
  30. the CK60 manual said it all. :)
  31.  
  32. >: ... and to reject the
  33. >: one line of theirs I know to be unreliable, restarting the dialing
  34. >: process if I detect that line.  I'd like the thing to beep at me
  35. >: when it eventually connects, so I know to drop whatever else I'm
  36. >: doing, but to stay quiet otherwise.
  37. >: 
  38. >: For some reason, this macro beeps every time it finds the bad modem
  39. >: and restarts.  Can someone explain why?
  40. >: 
  41. >It's not obvious from your script, but if INPUT ECHO is ON, and if the
  42. >service sends a beep character, then Kermit will echo it.
  43.  
  44. I guessed that, so I double checked, and the ISP sends no beeps.
  45. I watched a cycle of at least five toxic modem offers, and got a beep
  46. on each cycle, so I'm pretty confident it's not a simple buffering
  47. issue, per your comments below.  That is, it's not flushing a beep
  48. from a prior login attempt.  When I say "beep" I'm really referring
  49. to the "echo \007" command, of course.
  50.  
  51. >: One minor question: can someone explain the difference between the
  52. >: apparently undocumented "beep" command (can't find reference to it
  53. >: in the CK60 book, other than its use in a script example)...
  54. >:
  55. >It's on page 40, but you're right, it's missing from the index.
  56.  
  57. Ah, so it is; I'll add it to my marginal index. :)
  58.  
  59. >It just rings the bell or beeps, whatever your console is set up to
  60. >do normally when it gets an ASCII BEL character.
  61. >
  62. >: and the
  63. >: good old "echo \007" command?  The effects are very different.
  64. >: 
  65. >So you must be using Kermit 95.  In this case, the BEEP command can produce
  66. >different sounds...
  67.  
  68. Nope, Unix.  That's what was so surprising.  Back when I wrote one of
  69. my first shell scripts, sometime in 1982, called "beep" it consisted of:
  70.  
  71. echo -n "\007"
  72.  
  73. >:...
  74. >: define eskimo {
  75. >:     while not defined \%1 {
  76. >:         askq \%1 {Eskimo Password: }
  77. >:     }
  78. >:     :retry
  79. >:     dial 258-0759
  80. >:     in 30 {Your Selection ==>} #Initial selector, choose service
  81. >:     output 1\13                #Select Eskimo
  82. >:     in 60 login:               #Start login process
  83. >:     out jimo\13                #Look for: Hello ,CLI,,27,xxx@seattle2
  84. >:     clear input
  85. >:     in 30 {Welcome to eskimo.com}      #Read Annex ID string
  86. >:     xif \find({CLI,,27},\v(input)) {  #Start over if toxic modem
  87. >:         xif \find({@seattle2},\v(input)) {
  88. >:             echo {Aborting 27,,2}
  89. >:             goto retry
  90. >:         }
  91. >:     }
  92. >:     in 30 Password:
  93. >:     out \%1\13
  94. >:     in 60 {Main Command?}
  95. >:     out {!}                   #Start shell
  96. >: #    beep             #doesn't beep until escape back to kermit
  97. >:     echo \007    #^G
  98. >:     connect /quietly
  99. >: }
  100. >
  101. >"doesn't beep until escape back to kermit" is evidently a bug.  It's one of
  102. >those buffering things -- you tell the system to write something and it says
  103. >"OK I wrote it", but it really just put it in a list of things to do, which
  104. >evidently it does not get around to doing until something else forces it to.
  105. >We'll see if we can find a way to make the system force the beep out
  106. >immediately.  In the meantime "echo \007" is a good workaround (James Bond
  107. >to the rescue?).
  108.  
  109. Thanks for the response, and a terrific program!  If you can think of
  110. any workaround for the unwanted beep, I'd love to impliment it.  Maybe
  111. one of these days I'll dive into the source code for "beep" and see
  112. just how it differs from my old shell script, for curiosity.  As you say,
  113. that question has a solid workaround.
  114.  
  115. Jim